home *** CD-ROM | disk | FTP | other *** search
- ; Install-Script für RCON demo
- ;
- ; © 1993 Gerhard Radatz
- ;
- ; $VER:RCONInstall 1.1 (26-Sep-93)
-
- (set @app-name "RCON Console Handler 1.1 Demo")
-
- (set @language "english")
-
- (complete 0)
-
- (set vernum (getversion))
- (if (< (/ vernum 65536) 37)
- (abort "*** Installation aborted! ***\n You need at least version 2.04 of the OS to run RCON"))
-
- (set @default-dest "l:")
-
- (set sourcedir (pathonly @icon))
-
- (copyfiles (prompt "copying RCON-Handler and RCON-Server...")
- (source (tackon sourcedir "l/"))
- (dest @default-dest)
- (choices "RCON-Handler" "RCON-Server"))
-
- (copyfiles (prompt "copying RCON-mountlist...")
- (source (tackon sourcedir "devs/"))
- (dest "devs:")
- (choices "RCON-mountlist"))
-
- (complete 40)
-
- (copyfiles (prompt "copying Setkey...")
- (source (tackon sourcedir "c/"))
- (dest "c:")
- (choices "setkey"))
-
- (complete 50)
-
- (copyfiles (prompt "copying RCON-Prefs...")
- (source (tackon sourcedir "prefs/"))
- (dest "sys:Prefs")
- (choices "RCON-Prefs")
- (infos))
-
- (makedir "ENVARC:rcon" (prompt "Creating preferences directories for RCON..."))
- (copyfiles (prompt "copying Iconify Icon...")
- (source (tackon sourcedir "env/"))
- (all)
- (dest "ENVARC:")
- (infos))
-
- (complete 70)
-
- (if (askbool ((prompt "Do you want to install RCON as the default console handler ?")
- (help (cat "Installing RCON as the default handler means that it will replace \
- the built-in CON-Handler. If you select NO here, RCON will be mounted as RCON:, which means that \
- you have to type 'newshell RCON:' if you want to get an RCON shell window"))))
-
- (copyfiles (source (tackon sourcedir "s/InstallCON/RCONinstall"))
- (dest "s:"))
- (copyfiles (source (tackon sourcedir "s/InstallRCON/RCONinstall"))
- (dest "s:"))
- )
-
- (complete 80)
-
- (startup "RCON"
- (command "execute s:RCONinstall")
- (prompt "Shall the RCON-Handler be mounted during booting ?")
- (help (cat "If you click PROCEED here, your s:user-startup file will be modified to \
- mount the RCON Handler during startup.\n If you click SKIP THIS PART, you will have to execute the \
- S:RCONinstall script manually later on."))
- )
-
- (complete 90)
-
- (copyfiles (source (tackon sourcedir "Documentation/"))
- (dest (askdir (prompt "Where do you want to install the documentation of RCON ?")
- (help "Please indicate the directory where the amigaguide documentation of RCON shall be copied")
- (default "sys_help:")
- (newpath)
- (disk)
- ))
- (infos)
- (pattern "#?.guide"))
-
- (complete 100)
-
- (exit "Please reboot your computer to get the installation work or "
- "type in the command 'execute s:RCONinstall' manually")
-
-